package io.nutz.nutzsite.common.utils;

import java.net.InetAddress;
import java.net.UnknownHostException;
import java.util.List;

import javax.servlet.http.HttpServletRequest;

import org.nutz.lang.Lang;
import org.nutz.lang.Strings;
/**
 * 获取IP方法
 *
 * @author ruoyi
 */
public class IpUtils {
	private static final String[] headInfo = { "X-Forwarded-For", "Proxy-Client-IP", "WL-Proxy-Client-IP",
		"HTTP_X_FORWARDED_FOR", "HTTP_X_FORWARDED", "HTTP_X_CLUSTER_CLIENT_IP", "HTTP_CLIENT_IP",
		"HTTP_FORWARDED_FOR", "HTTP_FORWARDED", "HTTP_VIA", "REMOTE_ADDR", "PROXY_FORWARDED_FOR", "X-Real-IP"};
	/**
	 * 获取用户ip，可穿透代理
	 * @param request
	 * @return
	 */
	public static String getIpAddr2(HttpServletRequest request) {
		String ip="";
		for (String header : headInfo) {
			ip = request.getHeader(header);
			if (ip != null && ip.length() != 0 && !"unknown".equalsIgnoreCase(ip)) {
				if (ip.indexOf(",") != -1 && ip.length() > 15) {
					String[] ips = ip.split(",");
					for (int i = 0; i < ips.length; i++) {
						String ipMulti = (String) ips[i];
						if (!("unknown".equalsIgnoreCase(ipMulti))) {
							ip = ipMulti;
							break;
						}
					}
				}
				break;//return ip;
			}
		}
        if ((!Strings.isBlank(ip)) &&(Lang.isIPv4Address(ip) )) {
            return ip;
        }else{
        	ip=request.getRemoteAddr();
        	if ((!Strings.isBlank(ip)) &&(Lang.isIPv4Address(ip) )) {
                return ip;
            }else 
            	return "0:0:0:0:0:0:0:1".equals(ip) ? "127.0.0.1" : ip;
        }
	}

    public static String getIpAddr(HttpServletRequest request) {
        if (request == null) {
            return "unknown";
        }
        String ip = request.getHeader("x-forwarded-for");
        if (ip == null || ip.length() == 0 || "unknown".equalsIgnoreCase(ip)) {
            ip = request.getHeader("Proxy-Client-IP");
        }
        if (ip == null || ip.length() == 0 || "unknown".equalsIgnoreCase(ip)) {
            ip = request.getHeader("X-Forwarded-For");
        }
        if (ip == null || ip.length() == 0 || "unknown".equalsIgnoreCase(ip)) {
            ip = request.getHeader("WL-Proxy-Client-IP");
        }
        if (ip == null || ip.length() == 0 || "unknown".equalsIgnoreCase(ip)) {
            ip = request.getHeader("X-Real-IP");
        }

        if (ip == null || ip.length() == 0 || "unknown".equalsIgnoreCase(ip)) {
            ip = request.getRemoteAddr();
        }

        return "0:0:0:0:0:0:0:1".equals(ip) ? "127.0.0.1" : ip;
    }

    public static boolean internalIp(String ip) {
        byte[] addr = textToNumericFormatV4(ip);
        if(addr ==null){
            return true;
        }
        return internalIp(addr) || "127.0.0.1".equals(ip);
    }

    private static boolean internalIp(byte[] addr) {
        final byte b0 = addr[0];
        final byte b1 = addr[1];
        // 10.x.x.x/8
        final byte SECTION_1 = 0x0A;
        // 172.16.x.x/12
        final byte SECTION_2 = (byte) 0xAC;
        final byte SECTION_3 = (byte) 0x10;
        final byte SECTION_4 = (byte) 0x1F;
        // 192.168.x.x/16
        final byte SECTION_5 = (byte) 0xC0;
        final byte SECTION_6 = (byte) 0xA8;
        switch (b0) {
            case SECTION_1:
                return true;
            case SECTION_2:
                if (b1 >= SECTION_3 && b1 <= SECTION_4) {
                    return true;
                }
            case SECTION_5:
                switch (b1) {
                    case SECTION_6:
                        return true;
                    default:
                        return false;
                }
            default:
                return false;
        }
    }

    /**
     * 将IPv4地址转换成字节
     *
     * @param text IPv4地址
     * @return byte 字节
     */
    public static byte[] textToNumericFormatV4(String text) {
        if (text.length() == 0) {
            return null;
        }

        byte[] bytes = new byte[4];
        String[] elements = text.split("\\.", -1);
        try {
            long l;
            int i;
            switch (elements.length) {
                case 1:
                    l = Long.parseLong(elements[0]);
                    if ((l < 0L) || (l > 4294967295L)) {
                        return null;
                    }
                    bytes[0] = (byte) (int) (l >> 24 & 0xFF);
                    bytes[1] = (byte) (int) ((l & 0xFFFFFF) >> 16 & 0xFF);
                    bytes[2] = (byte) (int) ((l & 0xFFFF) >> 8 & 0xFF);
                    bytes[3] = (byte) (int) (l & 0xFF);
                    break;
                case 2:
                    l = Integer.parseInt(elements[0]);
                    if ((l < 0L) || (l > 255L)) {
                        return null;
                    }
                    bytes[0] = (byte) (int) (l & 0xFF);
                    l = Integer.parseInt(elements[1]);
                    if ((l < 0L) || (l > 16777215L)) {
                        return null;
                    }
                    bytes[1] = (byte) (int) (l >> 16 & 0xFF);
                    bytes[2] = (byte) (int) ((l & 0xFFFF) >> 8 & 0xFF);
                    bytes[3] = (byte) (int) (l & 0xFF);
                    break;
                case 3:
                    for (i = 0; i < 2; ++i) {
                        l = Integer.parseInt(elements[i]);
                        if ((l < 0L) || (l > 255L)) {
                            return null;
                        }
                        bytes[i] = (byte) (int) (l & 0xFF);
                    }
                    l = Integer.parseInt(elements[2]);
                    if ((l < 0L) || (l > 65535L)) {
                        return null;
                    }
                    bytes[2] = (byte) (int) (l >> 8 & 0xFF);
                    bytes[3] = (byte) (int) (l & 0xFF);
                    break;
                case 4:
                    for (i = 0; i < 4; ++i) {
                        l = Integer.parseInt(elements[i]);
                        if ((l < 0L) || (l > 255L)) {
                            return null;
                        }
                        bytes[i] = (byte) (int) (l & 0xFF);
                    }
                    break;
                default:
                    return null;
            }
        } catch (NumberFormatException e) {
            return null;
        }
        return bytes;
    }

    public static String getHostIp() {
        try {
            return InetAddress.getLocalHost().getHostAddress();
        } catch (UnknownHostException e) {
        }
        return "127.0.0.1";
    }

    public static String getHostName() {
        try {
            return InetAddress.getLocalHost().getHostName();
        } catch (UnknownHostException e) {
        }
        return "未知";
    }
    public static String ip_ok(List<String> ids)
	{
		//List<String> ids= StringUtils.getStrRowValues(dao, Sqls.create("select ipnote from ksroom where state=1"));
		return StringUtils.listToString(ids);
	}
	/**
	 * 判断当前ip是否在考场范围内
	 */
    public static Boolean isRightKC(List<String> ids,String myip)
	{
		//List<String> ids= StringUtils.getStrRowValues(dao, Sqls.create("select ipnote from ksroom where state=1"));
		for(int i=0;i<ids.size();i++){
			String kcip=ids.get(i);
			if(kcip.contains("*")){
				String[] kcipsects=kcip.split("\\.");
				String[] myipsects=myip.split("\\.");
				int k=0;
				for(int j=0;j<kcipsects.length;j++){
					if(!kcipsects[j].equals("*") && kcipsects[j].equals(myipsects[j])) k++;
				}
				if(k==3)return true;
			}else{
				if(kcip.equals(myip)) return true;//各考场有路由，ip精确匹配
			}
		}
		return false;
	}
	/**
	 * 根据ip查找考场
	 * @param dao
	 * @param myip
	 * @return
	 */
    public static String findMyKC(List<String> ids,String myip)
	{
		//List<String> ids= StringUtils.getStrRowValues(dao, Sqls.create("select ipnote from ksroom where state=1"));
		for(int i=0;i<ids.size();i++){
			String kcip=ids.get(i);
			if(kcip.contains("*")){
				String[] kcipsects=kcip.split("\\.");
				String[] myipsects=myip.split("\\.");
				int k=0;
				for(int j=0;j<kcipsects.length;j++){
					if(!kcipsects[j].equals("*") && kcipsects[j].equals(myipsects[j])) k++;
				}
				if(k==3)return kcip.replace("*", "%");
			}else{
				if(kcip.equals(myip)) return kcip+"%";//各考场有路由，ip精确匹配
			}
		}
		return "0.0.0.0%";
	}
	/**
	 * 比较当前ip与考场ip，检查是否在当前考场
	 * @param kcip
	 * @param myip
	 * @return
	 */
    public static Boolean isRightKC2(String kcip,String myip)
	{
		if(kcip.contains("*")){
			String[] kcipsects=kcip.split("\\.");
			String[] myipsects=myip.split("\\.");
			int k=0;
			for(int j=0;j<kcipsects.length;j++){
				if(!kcipsects[j].equals("*") && kcipsects[j].equals(myipsects[j])) k++;
			}
			if(k==3)return true;
		}else{
			if(kcip.equals(myip)) return true;//各考场有路由，ip精确匹配
		}
		return false;
	}
}